home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 9 / developer source - volume 9.iso / parad / may96 / toddf109.gif < prev    next >
Graphics Interchange Format  |  1998-02-10  |  6.2 KB  |  526x335  |  4-bit (9 colors)
   ocr: ddi:mButton15-pushButton X nethod pushbutton(var eventinto Event) var db Database s9 SQL endvar db.open("iwork:") sq = - SQL ALTER TABLE rep.db" ADD Territory Char(4). ADD Datechanged Date, DROP HireDate endSQL if not sq.executesQL(db) then errorShowO) endIf endHethod